


(i 


Indice 


2 A proposito di questo libro 
3 Che cos’è un adventure? 
4 La leggenda della Montagna 
d’Argento 
6 Il paese dei Sylvani 
8 Personaggi che incontrerai 
2 Posti che visiterai 
18 Programma “Il mistero della 
Montagna d’Argento”’ 
28 Modifiche del programma per i 
diversi computer 
31 Come si gioca 
32 Suggerimenti 


Traduzione: Paolo Agostini 
Progetto: Graham Round 
Illustrazioni: Chris Riddell e Mark Duffin 





A proposito di questo libro 


Questo libro contiene il programma di un emozionante ‘‘adventure'’, che potrai di- 
gitare sulla tastiera del tuo computer e giocare. Il gioco è ambientato in un paese 
immaginario, governato da un malvagio tiranno. È compito tuo liberare gli abitanti 
del paese da questa tirannia. Per riuscire nell'impresa dovrai dar fondo alla tua 
abilità, usare la tua immaginazione ed anche la magia. Se non hai mai giocato un 
adventure, nella pagina a fronte puoi scoprire cosa succede in un adventure e 
come ci sì gioca. 


La prima parte del libro ti 
mostra il mondo in cui si 
svolge l'avventura, la gente 
e le altre creature che 
abitano colà. Potrai 
consultare queste pagine 
mentre giochi. Alcune 
delle illustrazioni 
contengono informazioni 
segrete, oppure cose che 
dovrai esaminare più da 
vicino. 

Il listato del programma 
inizia a pag. 18. Esso 
funziona sui computer 
Commodore 64, VIC 20, 
Apple, TRS-80, BBC, 
Electron e Spectrum. Il 
programma è molto lungo 
e dovrai copiarlo 
esattamente com'è scritto 
perché funzioni. 





$ ei Potrai saperne di più su come 
Come sl gioca si gioca questo gioco a pag. 


31 









A pag. 4 potrai leggere la trama che fa da gioco ci sono parecchi indovinelli e 


sfondo al gioco, e saperne di pi su problemi contorti, per cui probabilmente 
quella che sarà la tua ricerca, mentre le dovrai fare molti tentativi prima di poterlo 
pag. 6-7 illustrano il paesaggio portare a termine. Comunque, a ogni 
immaginario che ne sarà teatro. Potrai partita imparerai qualcosa su come 
ricorrere a questa descrizione mentre stai affrontare i problemi e sui pericoli che ti 
giocando, per sapere dove ti trovi. Nel si pareranno davanti*. 


* Se proprio non ce la fai, a pag. 32 potrai trovare alcuni suggerimenti. 





Che cos’è un adventure? 


Quando giochi un adventure, diventi l'eroe o l'eroina di un'avventura. Hai una 
pericolosa ricerca da effettuare e ti occorrerà tutta la tua ingegnosità ed 
astuzia per riuscire a portarla a termine. Potrai incontrare mostri e nemici ché 
dovrai sconfiggere perché ti impediscono il passaggio. Incontrerai nel corso 
del gioco oggetti (come ad esempio una lampada o una:fune) che, se usàti in 
modo corretto, ti aiuteranno a superare i rischi. 











In adventure differenti avrai ... Un pirata a caccia di 
compiti diversi. Potresti essere un tesoro ... 

un investigatore che risolve un 

caso di omicidio ... 







.. una spia 
alla ricerca di 
informazioni 
segrete. 



























Viaggerai nel mondo immaginario del 
gioco informando il computer sulla 
direzione da prendere (N per nord, S per 
sud, E per est, O per ovest, A per alto, B 
per basso). Il computer ti descriverà dove ti 
trovi e ti comunicherà la presenza di perso- 
naggi o oggetti. Darai istruzioni al computer 
digitando ciò che vuoi fare. Troverai a pag. 
31 come dare istruzioni al computer per il 


gioco contenuto in questo libro. Generalmente si danno al 


computer istruzioni che 
consistono di due parole, per 
es. SCALARE ALBERO. 





Potresti perdere la partita se non sai come bisogno degli - 
proseguire, per esempio se ti trovi davanti ie € 
a una porta chiusa e non hai prima trovato fepisiniante p N 
la chiave, o se il nemico ti cattura. Potrai i * Î 
però iniziare nuovamente il gioco quante 
volte vorrai, e sarà differente ogni volta, a dà 
È F via 
seconda della strada che prenderai, gli NES 
oggetti che raccoglierai e come li userai, | l ae l 
oppure in dipendenza di quale sarà il tuo Gira pagina per scoprire quale sia lo 
comportamento con gli altri personaggi che scopo della tua ricerca nell’adventure 


$ P contenuto in questo libro. 
compaiono nel gioco. da 
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Tutti coloro che conoscevano i Sylvani 
sapevano anche dell’esistenza della Pietra 


un tempo un popolo felice e prospero, del Destino, che veniva conservata dalla fa- 
governato da un saggio Consiglio di miglia reale nel loro Palazzo costruito sulla 

Anziani. Viaggiatori da molti paesi Montagna d'Argento. La Pietra dava al Re o 
venivano a visitare questa gente ospitale alla Regina il potere di guidare il destino di 


una persona, ma non era mai stata usata per 
scopi malvagi. 
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e a stabilirsi fra loro. 








Un grave pericolo minacciò il regné”? f Disperata, la Regina Pari Sylvan ottenne il 
della Regina Pari Sylvan, sotto permesso dal suo Consiglio degli Anziani 
forma di un imponente esercito di di utilizzare la Pietra. Ella entrò nella 
malvagi Grarg, intenzionati ad Camera d'Argento e, dopo aver posto le 
impadronirsi del Paese e della Pietra. mani attorno alla Pietra gridò le parole 
Assieme a loro-era anche il più potente magiche che ne avrebbero liberato i 
dei loro maghi, Magrarg. pote. 



















Uno degli Anziani era figlio di un 





Mentre parlava, un tuono rimbombò non 


appena Magrarg entrò mentalmente in viaggiatore Grarg che si era stabilito in 
conflitto con i poteri della Regina e del pace fra i Sylvani. Quando lo scontro 

Consiglio degli Anziani concentrati per mentale si fece più intenso, egli cedette a sr 
mezzo della Pietra. I Sylvani e i Grarg causa del conflitto delle tensioni 


vacillarono sotto le onde d’urto mentali. contrastanti che si producevano in lui, e 
Magrarg urlò il suo trionfo. 





Da allora i Sylvani vivono nel terrore 
come schiavi di un signore senza pietà, 
Grarg Ogban, e vittime dei suoi manigoldi 
sanguinari. Egli utilizza la Pietra per dar 
sfogo alla sua sete di distruzione contro i 
familiari e gli amici di chiunque osi 
opporglisi. 


Prima di morire, Pari Sylvano aveva 
racchiuso nella mente del suo bimbo un 
segreto: i suoi antenati reali avevano dato 
al popolo alcuni oggetti magici i cui 
poteri combinati avrebbero potuto aver 
ragione di una forza malvagia che avesse 
avuto il controllo della Pietra del Destino. 


Un giorno quando gli Anziani sentivano 

che il successo era vicino, Kylar venne 
ucciso da un avido Grarg che bramava 

il possesso dello spillone che egli indossava, 
un regalo ricevuto dall’eremita. 

Gli oggetti magici che aveva trovato 
tornarono in un baleno ai luoghi di origine. 


pier 


Gli Anziani Sylvani però avevano una 
speranza. Pari Sylvan, brutalmente 
assassinata dagli invasori, aveva lasciato 
un figlio in tenera età, Kylar. Egli era stato 
affidato a un saggio eremita che l’aveva 
allevato, e la sua identità era un segreto 
custodito gelosamente. 


Nel corso dei secoli il luogo dove questi 
oggetti apparentemente insignificanti si 
trovavano era stato dimenticato. Kylar Sylvan 
era partito per tentare di rintracciarli. Egli 
aveva cercato per anni, senza comunicare a 
nessuno a quale punto si trovasse, per paura 
di mettere a repentaglio la vite dei suoi amici. 


Da allora gli Anziani hanno svelato lo 
scopo della ricerca ad una serie di 
Sylvani sinceri e meritevoli: tutti hanno 
fallito. Ora essi implorano chiunque voglia 
ascoltarli: “Chi accetterà la sfida e ci 
libererà dalla tirannia?” 





Il paese dei Sylvani D, 


Questo è il suolo sul quale dovrai 
viaggiare alla ricerca degli oggetti 
magici, superando i rischi che 
incontrerai nel cammino. Tu non sai 
quali siano gli oggetti magici e dovrai 
andare alla ricerca di indizi rivelatori. 
E inoltre, quali sono le parole magiche 
capaci di scatenare il potere della 
Pietra? Avrai bisogno di tutta la tua 
ingegnosità per aver successo nella 
ricerca e entrare nel Palazzo 
d’Argento, ma neppure allora saranno 
finiti i tuoi quai. 





















Scavati attraverso il cuore 
della Montagna d’Argento vi 
sono tunnel segreti che 
portano al Palazzo d’Argento. fi 
Sono rimasti in pochi a 
conoscerli. 













Kylar ha trovato qui la 
morte, dove non c’è nessuno 
che possa sentire 

un’invocazione d’aiuto. 
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Bande di Grarg turbolenti scorrazzano per 
la campagna. Probabilmente, prima di 
poterli vedere, sentirai che si stanno 
avvicinando dal rumore che fanno. 







Questo ponte non è cosi 
sicuro come sembra. 




























All’interno del Palazzo d’Argento v'è la 
Camera d’Argento, dove si trova la Pietra 
del Destino. Nell’improbabile eventualità 
che qualcuno penetri nel Palazzo per 
recuperare la Pietra, il Mago Magrarg ha 
gettato un potente incantesimo per impedire 
a chiunque, che non sia egli stesso o Lord 
Ogban, di avvicinarvisi. 






Un imponente ghiacciaio 
inizia la sua lenta discesa 
alla sommità del picco 
vicino alla Montagna 
d’Argento. 





Questo antico cerchio di 
pietre ha un potere magico. 
Può darsi che racchiuda 
segreti che ti saranno 
preziosi. 






Questi boschi sono scuri e 
incantati. Altri tentativi di 
liberare i Sylvani sono falliti 
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Gli abitanti del villaggio stanno tappati in 
casa e non osano parlare con gli stranieri, 
temendo si tratti di spie di Grarg. Molte case 
sono deserte, dato che i loro abitanti sono 
fuggiti o sono stati uccisi dalle orde di Ogban. 


Lord Ogban 


pera pai ; 
| im 3 DS 
fi. e a LA EZZAZIA 


eri 


‘4 Pazzo di potere e cupidigia, Lord Ogban di controllo. Egli è ancora un avversario 
lascia raramente la sua stanza. Avendo formidabile, nonostante condivida il debo- 
perso tutte le sue qualità naturali di le che i Grarg hanno per il cibo e il vino, 

{I comando, egli preferisce star vicino alla che vengono portati in grandi quantità alla 
/.« Pietra del Destino che è il suo solo mezzo porta della sua camera da un paggio. 


“Il Mago Magrarg 


+ Nonostante Ogban si possa 

È considerare sovrano del 
paese, in effetti è Magrarg {ll 
a detenere il potere. Egli è 
felice che Ogban si occupi 
soltanto di tormentare 
giorno dopo giorno i 
Sylvani, lasciandolo libero 
di cimentarsi in magie 
vieppiù potenti. 
Fintantoché egli avrà nelle 
sue mani la Pietra, non vi 
sarà un solo mago al 
mondo in grado di 
eguagliarlo. La sua 
potenza è talmente 
concentrata che se 
dovesse vedersi in uno 
specchio, il male riflesso 
nei suoi occhi causerebbe 
ùn cortocircuito esplosivo. 





Vi sono bande di Grarg avidi di bottino 
che terrorizzano le campagne. Ti 
cattureranno non appena di vedranno. 
All’interno del Palazzo una robusta 
sentinella monta di guardia e ogni 


i Sylvan aveva fatto al figlio Kylar era un 
cucciolo. Nell’intento di infliggere 
sofferenze a tutti imembri della famiglia 
| reale, persino ad un semplice animale, 
. {|Magrarg aveva gettato un incantesimo 

‘| sul cucciolo, condannandolo a tremare 


RE 


straniero viene immediatamente riconosciu- 
to. I Grarg sono codardi di per sé, ma vir- 
tualmente indistruttibili grazie alle salde ar- 
mature e alle armi micidiali che 


possiedono. 


= == ? 


per il freddo e a patire la fame per 
sempre davanti ai cancelli di vetro del 
Palazzo. Non avendo conosciuto alcuna 
gentilezza fin dalle prime settimane di 
vita, il giovane cucciolo a cui piaceva 
giocare è diventato un feroce cane da 
guardia. 
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Sotto il ponte vive un ignobile Troll. 
Viene tenuto li da Ogban per impedire ai 
Sylvani di muoversi liberamente per la 
campagna. 






Il verro di Ogban 
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| Da giovane Ogban era stato 1% A venne mai preso e ora vaga per le = 
un appassionato cacciatore. li E, fig”: campagne facendo preda di ogni cosa i 








I mago Magrarg soleva fornire animata che incontra. I guerrieri Grarg 

creature fantastiche per lo sport di rifiutano di avventurarsi nel suo 

Ogban. Uno di questi orrendi animali, un territorio ma può darsi che tu debba ta 
verro delle dimensioni di un toro, non farlo. pe pal 
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Quand’era vivo, il Goblin montava la 
guardia a un sentiero segreto sui fianchi 
della Montagna d’Argento. Quand’egli 
mori, fu sepolto nel Cimitero dei Goblin, 
ma Magrarg gli lanciò una maledizione, 
condannando il suo spirito a vagare sul 





 L’Eremita che si è preso cura di Kylar 









sentiero impedendo il passaggio a ps 
chiunque. Una sola cosa può liberare VS 
uno spirito di Goblin: il Re dei Goblin ha 
lasciato da qualche parte un indovinello 

poco simpatico per il suo suddito, ma 
nessuno sinora è riuscito a risolverlo. 


SIVDILLZE 











METZ, ornati 





da bambino vive ancora nel folto della 
foresta. Egli non cerca compagnia e non 
si fida di nessuno, tranne che di alcuni 
Anziani che finora sono riusciti a 
sfuggire al furore assassino di Ogban. 
Egli ha già visto il volgere di parecchie 
generazioni e potrebbe essere in 
possesso di conoscenze di importanza 
vitale per te, ma occorre che tu gli 
dimostri le tue buone intenzioni. 











Il giardino di rocky 
SPA. 


pred 


La Regina Pari Sylvan fece fare questo 
giardino di roccia molti anni fa. Le pian- 
te crescono straordinariamente bene qui. 


Ogban usa questa cantina per 


immagazzinare le sue provviste di vino, 
ma i barili erano qui già da prima. 





$ A memoria d’uomo la fontana è sempre 
i) stata in questo cortile. 


n) 





esi La Statua Il bordo del lago 





Nel caso tu volessi 
attraversare il lago, fai 
attenzione: si dice che 2 
sia senza fondo e che la 
sua superficie ghiacciata 
sia spazzata da venti 
capricciosi. 





La statua, che É 
_.. | rappresenta un 7 
—=> | antico sovrano dei 4 
Sylvani, è stata ) 


__| sfigurata dai / 
Grarg. 
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Questo è un luogo incantato. Un 
misterioso epitaffio attira il tuo sguardo, 
ma può darsi che tu non riesca a 
comprenderlo. 
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\\ Il cerchio AIN “i \ 
“di Pietre — MOST _ 3 eng a 
S dg tto Proverai un senso di benessere qui. 
Probabilmente gli spiriti di coloro che 
hanno costruito i cerchi tentano di 
incoraggiarti. 


cosicché la biblioteca è deserta e 
polverosa. Tuttavia, qui ci sono molti 
libri eruditi. 














Questo Grarg ha mangiato e bevuto 
troppo ad uno dei loro frequenti 
banchetti. Sta attento a non svegliarlo.. 


VA / LS 
Sei esausto dopo aver lottato per giun- 
gere fin quassi. Fai attenzione, però, 


a non lasciarti sfuggire nulla: potresti 
non farcela una seconda volta. 









Programma 
‘Il mistero della Montagna d’Argento’’ 


Inizia qui sotto il listato del programma per ‘Il mistero della Montagna d'Argento". 
Digitalo sulla tastiera del tuo computer esattamente com'è scritto. Funziona sui 
computer Commodore 64, VIC 20, Apple, TRS-80, BBC, Electron e Spectrum. 
Alcune linee devono essere modificate per i diversì computer, e sono 
contrassegnate con un asterisco; le conversioni si trovano alle pagine 28 e 29. 
Quando incontri una linea segnata con un asterisco, controlla in questa pagine per 
vedere se devi modificare la linea per adattarla al tuo computer. 

Copiare il programma probabilmente tì darà qualche suggerimento per il gioco, 
ma ciò non ti rovinerà il gusto di giocarci; comunque, se riesci a convincere 
qualcun altro a copiarlo al posto tuo, tanto meglio. Probabilmente dovrai 
ricompensare chi lo fa, poiché gli potranno occorrere diverse ore di lavoro. Forse 
ci saranno degli errori nel programma, dovuti a errori di battitura, per cuì 
correggilo molto attentamente, e poi registralo su nastro 0 disco. 

A pag. 30 potrai scopire come si gioca quest'adventure. 










Copia il programma con 
cura: un solo errore 
potrebbe impedirgli di 
funzionare. Controlla ogni 
linea, appena l’hai copiata: è 
più facile che controllare 
tutto in una volta. 











5 REM LA MONTAGNA D'ARGENTO sone 
*10 LET EL=39:LET N0=88:LET NV=57:LET G=28 85 

20 GOSUB 3380 ) 

30 GOSUB 4400 (i Do 

40 LET LL=0 » 

50 GOSUB 3310 De, 
*60 : 
*70 LET J$=R$+". "+"TI TROVI "+D$+" ":GOSUB 4830 

80 GOSUB 3330:LET J$="" 

90 FOR I=1 TO G-1 

100 READ 0$ Prima di cominciare a copiare, 
*110 REM vai alle pag. sn na i 

“i Ri n mn mn per scoprire quali ee adovral 

u Agg O AND C(I)=R THEN LET J$=J$+ 0 modificare per adattarle al tuo 
computer. Potresti fare un 
segno con una matita accanto 
a queste linee nel programma 


principale per ricordarti che 
devono essere modificate. 
















140 IF R=29 AND F(48)=0 THEN LET J$=J$+ 
" I GRARG CHE FANNO BALDORIA" 


150 IF R=29 AND F(48)=1 THEN LET J$=J$+" UN GRARG ADDORMENTATO," 
160 IF R=12 OR R=22 THEN LET J$=J$+" UN PONY," 
170 IF R=64 THEN LET J$=J$+" UN EREMITA," 
*180 IF R=18 AND E$(18)="N" THEN LET J$=J$+" UNA PORTA DI QUERCIA," 
190 IF R=59 AND F(68)=1 THEN LET J$=J$+" OGBAN (MORTO)," 
200 IF J$<K>"" THEN LET J$=", PUOI VEDERE"+J$ 
210 LET J$=J$+" E PUOI ANDARE A_" 
220 GOSUB 4830:PRINT " "; 
*230 J$="":FOR I=1 TO LEN (E$(R)):PRINT MID$ (E$(R);1;1);";; 
240 NEXT I:PRINT:PRINT 
*250 LET R$="PREGO?":PRINT "================s=s==s=========sssssss==" 
*260 PRINT:PRINT:PRINT 4 
"COSA VUOI FARE ORA " 
270 INPUT I$ 
280 IF I$="REGISTRARE" THEN GOTO 4630 
290 LET V$="":LET T$="":LET VB=0:LET B=0 
*300 FOR I=1 TO LEN (I$) 
*310 IF MID$ (I$,1,1)=" " AND V$="" THEN LET V$=LEFT$ (I$,1-1) 
*320 IF MID$ (I$,I+1,1)<>" " AND V$<>"" THEN LET T$=MID$ (I$,I+1,LEN 


(I$)-1):LET I=LEN (I$) 
330 NEXT I:IF T$="" THEN LET V$=I$ 
340 IF LEN (V$)<4 THEN LET V$=V$+"?":GOTO 340 
18 350 IF Vè="SUONARE" AND T$="CAMPANA" THEN LET V$="RING" 
355 IF V$="APRIRE" AND T$="CANCELLI" THEN LET V$="UNLO" 







dovrai scrivere alla linea 
250, varia secondo il com- 
puter. Vedi pag. da 28 a 30 





*360 
*370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 


490 
500 
*510 
520 
530 
540 
*550 
*560 
570 
*580 
590 
*600 
610 
*620 
630 
640 
650 
60 
670 
680 
*690 
*700 
*710 


720 
730 
T4O 
750 
*760 
*770 
*780 
790 
800 
810 
820 
830 
840 


LET U$=LEFT$ (V$,4) i 
FOR I=1 TO NV:IF MID$ (B$,I*4-3,4)=U$ THEN LET VB=I:LET I=NV 

NEXT I:LET F(36)=0 

GOSUB 3330 

FOR I=1 TO NO:READ O$:FOR I1=1 TO LEN(0$) 

IF T$=MID$(0$,I1,LEN(T$)) THEN LET B=I:LET I=NO 

NEXT I1:NEXTaI 

IF B=0 AND F(36)=0 AND T$>"" THEN LET T$=T$+"S":LET F(36)=1:GOTO 390 
IF VB=0 THEN LET VB=NV+1 

IF T$="" THEN LET R$="DAMMI DUE PAROLE" 

IF VB>NV THEN LET R$="PROVA QUALCOS'ALTRO" 
IF VB>NV AND B=0 THEN LET R$="NON PUOI "+I$ 
IF B>G OR B=0 THEN GOTO 510 








Se hai un C64 tralascia tutti gli 
spazi tra parole e numeri nelle 
linee 510, 580, 600 e 620, e 
anche i LET. 


IF VB=8 OR VB=9 OR VB=14 OR VB=17 OR VB=44 OR VB>54 THEN GOTO 510 
IF VB<NV AND C(B)<>O THEN LET Ré="NON HAI "+T$:GOTO 30 

IF R=56 AND F(35)=0 AND VB<>37 AND VB<>53 THEN'LET R$=X1$+" TI HA PRESO!":GOTO 30 
IF VB=44 OR VB=47 OR VB=19 OR VB=57 OR VB=49 THEN GOTO 540 

IF R=48 AND F(63)=0O THEN LET R$=X9$:GOTO 30 

LET H=VAL (STR$ (R)+STR$ (B)) 

ON INT ((VB-1)/13)+1GOTO 560,580,600,620,640 

ON VBGOSUB 800,800,800,800,800,800,1220,1290,1290,1470,1470,1750,1890 

GOTO 650 

ON VB-13GOSUB 1960,1980,2010,2050,2870,2120,2220,2310,2380,2420,2450,2470,2520 
GOTO 650 

ON VB-26GOSUB 2550,2580,2610,2650,2670,2700,2720,2730,2830,2800,2870,2730,2920 
GOTO 650 

ON VB-39GOSUB 2950,2990,3010,3050,3070,2310,2990,3070,3130,2120,3190,1470,3100 
GOTO 650 

ON VB-52GOSUB 2870,3150,1290,1290,3170,3200 

IF F(62)=1 THEN GOTO 730 

IF R=41 THEN LET F(67)=F(67)+1:IF F(67)=10 THEN LET F(56)=1:LET R$="SEI AFFON 
IF R=56 AND F(35)=0 AND C(10)<>0 THEN LET R$=X1$+" TI PRENDE!":LET F(56)=1 

IF F(56)=0 THEN GOTO 30 

GOSUB 4400:PRINT R$ 

PRINT "HAI FALLITO NELL'IMPRESA!" 

PRINT:PRINT "MA TI VIENE ACCORDATA UN'ALTRA POSSIBILITA 


tI 


ATO!" 
4AUWì 






Il messaggio delle linee 
dalla 740 alla 780 verrà 
visualizzato se vinci. 


GOSUB 3360:RUN 

GOSUB 4400 

PRINT "UUUUURRRRRAAAAA!!" 

PRINT 

PRINT "LA TUA IMPRESA HA AVUTO" 
PRINT "SUCCESSO E HAI PORTATO LA" 
PRINT "PACE NEL PAESE" 

STOP 

LET D=VB 

IF D=5 THEN LET D=1 

IF D=6 THEN LET D=3 

IF NOT ((R=75 AND D=2) OR (R=76 AND D=4)) OR F(64)=1 THEN GOTO 850 

LET Ré="VO USPMM UJ CMPDDB JM QBTTBHHJP":GOSUB4260:RETURN 19 


850 
860 
870 
880 
890 


*900 
*910 


20 


920 
930 
940 
950 
960 
970 
980 
990 


Se hai un C64, tralascia gli 
spazi nella linea 900 e usa la 


forma abbreviata di RETURN 
d.pag. 28). 
IF F(64)=1 THEN LET F(64)=0 eso: 9) 


IF F(51)=1 OR F(29)=1 THEN GOTO 900 
IF F(55)=1 THEN LET F(56)=1:LET Ré="I GRARG TI HANNO PRESO!" :RETURN 

IF R=29 AND F(48)=0 THEN LET Ré="I GRARG TI VEDRANNO!":RETURN 

IF R=73 OR R=42 OR R=10 THEN LET R$=X3$:LET F(55)=1:RETURN 
IFC(8)=OAND((R=52ANDD=2)OR(R=31ANDD<>3))THENLETR$="LA BARCA E' TROPPO PESANTE" : RETURN 
IFC(8)<>OAND((R=52 AND D=4) OR (R=31 AND D=3)) THEN LET R$="NON SAI NUOTARE 

IF R=52 AND C(8)=0 AND D=4 AND F(30)=0 THEN LET Ré="NON FUNZIONA!" :RETURN 
IFR=41ANDD=3ANDF(31)=OTHENLETR$="MB CBSDB TUB BGGPOEBOEP!":GOSUB4260:RETURN 

IFR=33 AND D=1 AND F(32)=0 THEN LET R$="IL VERRO DI OGBAN TI BLOCCA LA STRADA" : RETURN 
IF ((R=3 AND D=2) OR (R=4 AND D=4)) AND F(45)=0 THEN LET R$=X5$ : RETURN 

IF R=35 AND C(13)<>R THEN LET R$="IL GHIACCIO SI STA ROMPENDO!" :RETURN 

IF R=5 AND (D=2 OR D=l) THEN GOSUB 4310 

IF R=4 AND D=4 THEN LET Ré="IL PASSAGGIO E' TROPPO RIPIDO" :RETURN 

IF R=7 AND D=2 AND F(46)=0 THEN LET Ré="UN GROSSO CANE TI SBARRA LA STRADA" : RETURN 





1000 IF (R=38 OR R=37) AND F(50)=0 THEN LET Ré="GB USPQQP CVJP":GOSUB 4260:RETURN 

*1010 IF R=49 AND D=2 AND F(54)=0 THEN LET R$="FORZE MISTERIOSE TI TRATTENGONO" :RETURN 
1020 IF R=49 AND D=3 AND F(68)=0 THEN LET R$="HAI INCONTRATO OGBAN!!!":LET F(56)=1:RETURN 
1030 IF R=38 AND F(65)=0 THEN LET R$="I RATTI TI ROSICCHIANO LE CAVIGLIE" : RETURN 

*1040 IFR=58AND(D=1 OR D=4)ANDF(66)=0 THEN LET R$="RESTI PRESO NELLE RAGNATELE!":RETURN 
1050 IF R=48 AND D=4 AND F(70)=0 THEN LET Ré="LA PORTA NON SI APRE":RETURN 
1060 IF R=40 AND F(47)=1 THEN LET F(68)=1 È 

*1070 IF R=37 AND D=4 AND E$(37)="EO" THEN LET R=67:LETR$="IL PASSAGGIO ERA RIPIDO!" :RETURN 
1080 IF R=29 AND D=3 THEN LET F(48)=1:LET F(20)=0 
1090 IF R=8 AND D=2 THEN LET F(46)=0 
1100 LET OM=R:FOR I=1 TO LEN (E$(R)) 

*1110 LET K$=MID$ (E$(OM),I,1) 


[a 
1120 IF (K$="N" OR K$="A") AND D=1 THEN LET R=R-10 
1130 IF K$="E" AND D=2 THEN LET R=R+1 
1140 IF (K$="S" OR K$="B") AND D=3 THEN LET R=R+10 
1150 IF Ké="0" AND D=4 THEN LET R=R-1 


Se hai un C64, tralascia gli 
spazi tra parole e numeri nelle 
linee 1010, 1040 e 1070. 





1160 NEXT I:LET R$="OK" 
1170 IF R=OM THEN LET Ré="NON PUOI ANDARE PER DI LA'"" 
1180 IF ((0M=75 AND D=2) OR (0M=76 AND D=4)) THEN LET R$="OK. SEI PASSATO" 
1190 IF F(29)=1 THEN LET F(39)=F(39)+1 
*1200 IFF(39)>5ANDF(29)=1THENLETR$="HMJ TUJWBMJ TPOP DPOTVOUJ":GOSUBY260:F(29)=0:C(3)=81 
1210 RETURN 
1220 GOSUB 3330:LET R$="0K":LET F(49)=0 
1230 PRINT "HAI CON TE: "; 
*1240 FOR I=1 TO G:READ Og:IF I=1 AND C(1)=O AND F(44)=1 THEN LET O$="MONETA" 
1250 IF I=G AND C(5)=0 THEN GOTO 1270 
1260 IF C(I)=0 THEN PRINT 0$;",";:LET F(49)=1 
1270 NEXT I:IF F(49)=0 THEN PRINT "NIENTE" 
1280 PRINT:GOSUB 3360:RETURN 
1290 IF H=6577 THEN LET R$="COME?":RETURN 
1300 IF H=4177 OR H=5177 THEN LET B=16:GOSUB 2380: RETURN 
1310 IF B=38 THEN LET Ré="TROPPO PESANTE!" :RETURN 
1320 IF B=4 AND F(43)=0 THEN LET R$="E' SALDAMENTE INCHIODATO!":RETURN 
1330 LET CO=0:FOR I=1 TO G-1:IF C(I)=0 THEN LET CO=C0+1 
1340 NEXT I:IF CO>13 THEN LET Ré="NON PUOI PORTARE NIENT'ALTRO":RETURN 
1350 IF B>G THEN LET Ré="NON PUOI PRENDERE "+T$: RETURN 


1360 IF B=0 THEN RETURN Devi copiare gli spazi tra 
1370 IF C(B)<>R THEN LET Ré="QUI NON C'E'!" virgolette, dovunque — 
1380 1F F(B)=1 THEN LET R$="CHE "+T$+"2" compaiano, per esempio alla 
1390 IF C(B)=0 THEN LET Ré="CE L'HAI GIA!" fine della linea 1400. 

1400 IF C(B)=R AND F(B)=0 THEN LET C(B)=0:LET R$="ORA HAI "+T$ 
1410 IF B=28 THEN LET C(5)=81 

1420 IF B=5 THEN LET C(28)=0 

1430 IF C(4)=0 AND C(12)=Q AND C(15)=0 THEN LET F(54)=1 

1440 IF B=8 AND F(30)=1 THEN LET C(2)=0 

1450 IF B=2 THEN LET F(30)=0 

1460 RETURN - 

1470 LET R$="VEDI ESATTAMENTE CIO' CHE TI SARESTI ASPETTATO!" 
1480 IF B>O THEN LET R$="NIENTE DI SPECIALE" 

1490 IF B=46 OR B=88 THEN GOSUB 2550 

1500 IF H=8076 THEN LET Ré="E' VUOTO" 

1510 IF H=8080 THEN LET R$="AHA!":LET F(1)=0 

1520 IF H=7029 THEN LET Ré="O0K":LET F(2)=0 








Se hai un C64, tralascia gli 
spazi nella linea 1600, e usa la 
forma abbreviata di GOSUB 
(ved. pag. 28). 


1530 IF B=20 THEN LET R$="J GJBNNJGFSJ TPOP JO UBTDB":GOSUB: 4260:LET C(26)=0 
1540 IF H=1648 THEN LET R$="CI SONO ALCUNE LETTERE: '"+G$(2)+""" 

1550 IF H=7432 THEN LET R$="TPOP BMCFSJ EJ NFMF":GOSUB 4260:LET F(5)=0 

1560 IF H=2134 OR H=2187 THEN LET Ré="O0K":LET F(16)=0 

1570 IF B=35 THEN LET R$é="E' SOSPETTO!":LET F(17)=0 

1580 IF H=3438 THEN LET R$="OK":LET F(22)=0 

1590 IF H=242 THEN LET R$="UN'ISCRIZIONE SBIADITA" 


*1600 IF(H=14430RH=1485)ANDF(33)=OTHENLET R$="RVBMDPTB SJMVDF JO MPOUBOBO[B" :GOSUB4260 
1610 IF (H=1443 OR H=1485) AND F(33)=1 THEN LET R$="QUI C'E' QUALCOSA...":LET F(12)=0 
1620 IF H=2479 OR H=2444 THEN LET R$="C'E' UNA MANIGLIA" 

1630 IF B=9 THEN LET Ré="TVMM'FUJDIFUUB TUB TDSJUUP 'WFMFOP!'":GOSUB4260 


Usa un righello per tenere il 
segno nel listato. Mettilo sotto 


la linea che stai copiando, e 
spostalo in gi, di linea in 


1640 IF H=4055 THEN GOSUB 3290 Îuba, iNhÎ malo che proosal 


1650 IF H=2969 AND F(48)=1 THEN LET R$="MOLTO BRUTTO!" 
1660 IF H=7158 OR H=7186 THEN LET R$="CI SONO MATTONI ALLENTATI" 
1670 IF R=49 THEN LET R$="MOLTO INTERESSANTE!" 

1680 IF B=52 OR B=82 OR B=81 THEN LET Ré="INTERESSANTE!" ® 
1690 IF H=6978 THEN LET R$="C'E' UNA PORTA DI LEGNO" Y 
1700 IF H=6970 THEN LET R$="HAI SCOPERTO QUALCOSA":LET F(4)=0 
1710 IF H=2066 THEN LET R$="UN GRANDE ARMADIO NELL'ANGOLO" 
1720 IF H=6865 OR H=6©853 THEN LET R$="CI SONO NOVE PIETRE" 
1730 IF H=248 THEN LET R$="VOB QBSPMB TCJBEJUB: 'Q M EJ'":GOSUB 4 
1740 RETURN 

1750 IF R=64 THEN LET R$="EGLI LO RESTITUISCE!" 

1760 IF H=6425 THEN GOSUB 3210 

1770 IF R=75 OR R=76 THEN LET R$="NON LO VUOLE" 

1780 IF B=62 AND F(44)=0 THEN LET R$="NON CE N'HAI PIU'!" 

1790 IF(H=7562 OR H=7662)AND F(44)>O AND C(1)=0 THEN LET R$="EGLI LO PRENDE":LETF(64)=1 
1800 IE F(64)=1 THEN LET F(44)=F(44)-1:IF F(44)=0 THEN LET C(1)=81 

1810 IF B=1 THEN LET R$="LI PRENDE TUTTI!":LET C(1)=81:LET F(64)=1:LET F(44)=0 

1820 IF H=2228 AND C(5)=81 THEN LET R$=XB$+"NORD":LET C(28)=81:LET R=12 

1830 IF (H=2228 AND C(5)=0) OR H=225 THEN LET R$=XB$+"NORD":LETR=12 

1840 IF (H=1228 AND C(5)=0) OR H=125 THEN LET R$=XB$+"SUD":LET R=22 

1850 IF R=7 OR R=33 THEN LET R$é="LO MANGIA!":LET C(B)=81 

1860 IF H=711 THEN LET F(46)=1:LET R$="E' DISTRATTO" 21 






1870 IF H=385 OR H=3824 THENLET R$="SE NE VANNO IN GRAN FRETTA":LET C(B)=81:LETF(65)=1 
1880 RETURN 

1890 LET R$="TU LO HAI DETTO" 

1900 IF B=84 THEN LET R$="DEVI DIRLE UNA ALLA VOLTA!":RETURN 

1910 IF R<>47 OR B<71 OR B>75 OR C(27)<>0 THEN RETURN 

1920 IF B=71 AND F(60)=0 THEN LET R$=X7$:LET F(60)=1:RETURN 

1930 IF B=72 AND F(60)=1 AND F(61)=0 THEN LET R$=X8$:LET F(61)=1:RETURN 

1940 IF B=(F(52)+73) AND F(60)=1 AND F(61)=1 THEN LET F(62)=1:RETURN 

1950 LET R$="LA PAROLA MAGICA SBAGLIATA!":LET F(56)=1:RETURN 

1960 IF B=5 OR B=10 THEN GOSUB 1290 

1970 RETURN 

1980 IF B=3 THEN LET F(29)=1:LET Ré="TFJ JOWJTJCJIMF":LET F(55)=0:GOSUB 4260 
1990 IF B=20 THEN LET F(51)=1:LET R$="TFJ DBNVGGBUP":LET F(55)=0:GOSUB 4260 
2000 RETURN 

2010 IF B=2 OR B=14 THEN LET R$="NON C'E' NULLA A CUI LEGARLO!" 

2020 IF H=7214 THEN LET R$="E' LEGATO":LET C(14)=72:LET F(53)=1 

2030 IF H=722 THEN LET R$="OK":LET F(40)=1:LET C(2)=72 

2040 RETURN 

2050 IF H=1547 AND F(38)=1 THEN LET R$="VA BENE":LET R=16 

2060 IF B=14 OR B=2 THEN LET Ré;"NON E' ATTACCATO A NULLA!" 

2070 IF H=5414 AND C(14)=54 THEN LET Ré="SEI IN CIMA" 

2080 IF H=7214 AND F(53)=1 THEN LET R$é="STO SCENDENDO":LET R=71 

2090 IF H=722 AND F(40)=1'THEN LET R=71:LET Ré="E' ROTTO":LET C(2)=81:LET F(40 
2100 IF H=7114 AND F(53)=i T LET C(i4)=71:LET F(53)=0:LET R$="CADE: PATAPUNFi” 
2110 RETURN 

2120 IF H=522 THEN LET R$="0K":LET F(30)=1 

2130 IF B=1 OR B=62 OR B=5 OR B=28 OR B=11 OR B=24 THEN GOSUB 1750 

2140 IF H=416 THEN LET R$="TFJ SUNBTUP B HBMMB":LET F(31)=1:GOSUB 4260:RETURN 
2150 IF H=4116 THEN LET R$="NON E' ABBASTANZA GRANDE!":RETURN 

2160 IF B=18 OR B=7 THEN GOSUB 2470 

2170 IF B=13 THEN GOSUB 2730 

2180 IF B=19 THEN GOSUB 3070 

2190 IF B=10 THEN GOSUB 2870 

2200 IF B=16 OR B=6 THEN GOSUB 2380 

2210 RETURN 







Potrebbe esserti pi facile la 
battitura o il controllo del lista- 
to se qualcuno te lo leggesse. 





2220 IF B=76 OR B=38 THEN GOSUB 1470 

2230 IF H=2030 THEN LET F(9)=0:LET R$="0K" 

2240 IF H=6030 THEN LET R$="0K":LET F(3)=0 

2250 IF H=2444 OR H=1870 THEN LET R$; "NON SEI ABBASTANZA FORTE" 

2260 IF H=3756 THEN LET R$="UN PASSAGGIO!":LET E$(37)="Ew" 

2270 IF H=5960 THEN GOSUB 3260 

2280 IF H=6970 THEN LET R$="FUORIESCE DAI CARDINI" 

2290 IF H=4870 THEN LET R$="E' CHIUSA A CHIAVE" 

2300 RETURN 

2310 IF B>G THEN LET R$="NON BRUCIA" 

2320 IF H=3826 THEN LET R$="NON FA ABBASTANZA LUCE" 

2340 IF (B=23 OR H=6970) AND C(26)<>0 THEN LET R$="OJFOUF GJBNNJGFSJ":GOSUB 4260 

2350 IF B=23 AND C(26)=0 THEN LET R$="UN RISPLENDENTE "+V$:LET F(50)=1 

2360 IF H=6970 AND C(26)=0O THEN LET F(43)=1:LET R$="SI E' TRASFORMATA IN CENERE" 
72 2370 RETURN 


2380 IF (B=16 OR B=6) AND (R=41 OR R=51) THEN LET R$="TI SEI CAPOVOLTO!":LET F(56)=1 
2390 IF H=6516 AND C(16)=0 THEN LET R$="ADESSO E' PIENA!":LET F(34)=1 

2400 IF H=656 TNEN LET R$="PERDE!" 

2410 RETURN, 

2420 IF B<?22 OR R<>15 THEN LET R$="NON CRESCE!":RETURN 

2430 LET R$="0K":LET F(37)=1 

2440 RETURN 

2450 IF B=22 AND F(37)=1 AND F(34)=1 THEN LET R$=X2$:LET F(38)=1:GOSUB 4260 

2460 RETURN 

2470 IF B=7 OR B=19 THEN LET R$="BA-DAN!" 

2480 IF H=5818 THEN LET Ré="HAI PULITO LE RAGNATELE":LET F(66)=1 

2490 IF H=187 THEN LET R$="LA PORTA SI E' ROTTA!":LET E$(18)="NS":LET E$(28)="NS" 
2500 IF H=717 THEN LET R$="SEI RIUSCITO A PASSARE":LET E$(71)="N" 

2510 RETURN 

2520 IF B=16 THEN LET B=22:GOSUB 2450 

2530 IF H=499 THEN LET R$="DOVE?" 

2540 RETURN 


Fai attenzione a non confondere 
la lettera I maiuscola con il 


numero l, o la lettera O 
maiuscola col numero 0. 





2550 IF H=4337 THEN LET VB=2:GOSUB 800:RETURN 
2560 IF R=36 THEN LET R$="HAI SCOPERTO QUALCOSA":LET F(13)=0 
2570 RETURN - 
2580 IF R=76 THEN LET VB=4:GOSUB 800:RETURN 

2590 IF R=75 THEN LET VB=2:GOSUB 800 

2600 RETURN 





2610 IF (B=3 AND F(29)=1) THEN LET R$="PRESO":LET F(29)=0 
2620 IF (B=20 AND F(51)=1) THEN LET R$="O0K":LET F(51)=0 
2630 IF B=36 OR B=50 THEN GOSUB 2950 

2640 RETURN 

2650 IF H=3859 OR H=3339 OR H=1241 OR H=2241 OR H=751 THEN LET R$="CON CHE COSA?" 

2660 RETURN 

2670 IF H=2340 THEN LET R$="VA ATTORNO" 

2680 IFH=2445THENLET R$="J DBODFMMJ TPOP BQFSUJ,MF QJTDJOF WVPUF":LET F(33)=1:GOSUB4260 
2690 RETURN 

2700 IF R=14 OR R=51 THEN LET R$="SEI ANNEGATO":LET F(56)=1 

2710 RETURN 

2720 LET Ré="COME?":RETURN 

2730 IF B=0 OR B>G THEN RETURN 

2740 LET C(B)=R:LET R$="FATTO" 

2750 IF H=418 OR H=518 THEN LET R$="SEI ANNEGATO!":LET F(56)=1 

2760 IF B=8 AND F(30)=1 THEN LET C(2)=R 

2770 IF B=16 AND F(34)=1 THEN LET Ré="HAI PERSO L'ACQUA!":LET F(34)=0 

2780 IF B=2 AND F(30)=1 THEN LET F(30)=0 

2790 RETURN 


2800 IF B=62 AND F(44)=0 THEN LET Ré="NON NE HAI" 
2810 IF H=5762 AND C(1)=0 AND F(44)>0 THEN GOSUB 3230 
2820 RETURN 

2830 IF B=0 OR B>G THEN RETURN 

2840 LET R$="NON E' ANDATO LONTANO!":LET C(B)=R 

2850 IF H=3317 THEN LET Ré="IBJ QSFTP JM WFSSP":LET F(32)=1:GOSUB 4260 

2860 RETURN 

2870 IF B=10 THEN LET Ré="DIF CFMMB DBO[POF":GOSUB 4260 

2880 IF H=5233 THEN LET R$é="CON CHE?" 23 





2890 
2900 
2910 
2920 
2930 
2940 
2950 
2960 
2970 
2980 
2990 
3000 
3010 


*3020 
3030 
3040 
3050 
3060 
3070 
3080 
3090 
3100 
3110 
3120 
3130 
3140 
3150 
3160 
3170 
3180 
3190 
3200 
3210 
3220 
3230 
3240 
3250 
3260 
3270 
3280 
3290 
*3300 
*3310 
3320 
*3330 
3340 
*3350 
*3360 
3370 
*3380 
24 3390 


IF B=83 THEN LET R$="COME, CON UNO MUSICALE?" 
IF H=5610 THEN LET F(35)=1:LET R$=X1$+" E' APERTO!":LET E$(56)="NS" 
RETURN 

IF B=0 OR B>G THEN RETURN 

IF B=5 OR B=24 THEN LET R$="GNAM GNAM!":LET C(B)=81 

RETURN 

IF R=4 AND B=50 THEN LET F(45)=1:LET R$="HAI SCOPERTO UN RIPIDO PASSAGGIO" 
IF R=3 AND B=50 THEN LET Ré="NON PUOI SMUOVERE I CALCINACCI DA QUI" 
IF H=7136 THEN LET Ré="VI SONO INCUNEATI!" 

RETURN l 

IF (B=67 OR B=68) AND C(9)=0 AND R(849) THEN LET Ré="OK":LET F(47)=1 
RETURN 

IF R<>27 OR B<>63 THEN RETURN 








Se hai un C64, tra- 

lascia gli spazi tra 

le parole, nella 
linea 





PRINT:PRINT "QUANTE VOLTE?":INPUT MR:IF MR=0 THEN PRINT "UN NUMERO":GOTO 3020 
IF MR=F(42) THEN LET R$="UNA PORTA DI ROCCIA SI APRE":LET E$(27)="E0":RETURN 
LET R$="IBJ NBMUSBUUBUP MB DBNQBOB":LET F(56)=1:GOSUB 4260:RETURN 

IF H=5861 THEN LET H=5818:GOSUB 2470 

RETURN 

IF (H=4864 OR H=4819) AND C(19)=0 THÈN LET R$=X6$:LET F(63)=1:GOSUB 4260 

IF B=27 THEN GOSUB 1290 

RETURN 

IF H=7549 OR H=7649 THEN LET R$="CON CHE COSA ?" 

IF B=1 OR B=62 THEN GOSUB 1750 

RETURN 

IF H=4870 AND C(21)=0 THEN LET Ré="LA CHIAVE GIRA!":LET F(70)=1 

RETURN 

IF H=1870 THEN LET R$="COME?" 


RETURN © 
IF R=48 THEN LET R$="COME?" 

RETURN 

LET R$="HAI SETE?" 

RETURN 

LET R$="LO PRENDE E DICE: 'CI VOGLIONO"+STR$ (F(42))+"RINTOCCHI":LET C(25)=81 


RETURN 

LET F(44)=F(44)-1:LET Ré="APPARE UN NUMERO: "+STR$ (F(41)) 

IF F(44)=0 THEN LET C(1)=81 

RETURN 

PRINT:LET Ré="RVBM'F' JM DPEJDF":GOSUB 4260:PRINT Ré:INPUT CN 
LET R$="SBAGLIATO!":IF CN=F(41) THEN LET Ré="SI APRE":LET F(21)=0 
RETURN 

LET T=R:LET R=F(F(52)+57):GOSUB 3310:LET R=T 

LET R$=S4$+RIGHT$ (D$,LEN (D$)-2):RETURN 

RESTORE:FOR I=1 TO R:READ D$:NEXT I 

RETURN 

RESTORE:FOR I=1 TO 80:READ Dé:NEXT I 

RETURN 

REM 

PRINT "PREMI RETURN PER CONTINUARE" 

INPUT Z$:RETURN 

DIM C(G),E$(80),F(70),G$(2) 

GOSUB 3330 


3400 FOR I=1 TO NO:READ T$:NEXT I 
3410 REM 


3420 LET B$="N???E???S??20???A???B???INVEPRENPRENESAMLEGGDAREDIRECOGLINDOLEGA" 
3430 LET B$=B$+"SCALISSAUSARAPRIACCERIEMPIANANNASALTSVUOENTRATTRRIMUNUTRGIRA" | 
3440 LET B$=B$+"NUOTIMPELASCGETTINSESUONGETTMANGMUOVDENTRINGTAGLTRATBRUC" 
3445 LET B$=B$+"AVVEMOSTUNLOCON?BERECONTPAGAFAREROMPRUBARACCRIFL" 
*3450 LET X6$+"IBJ SJGMFTTP MP THVBSEP EFM NBHP! F' NPSUP!" 
‘3460 .LET X1$="LO SPIRITO DEL GUARDIANO GOBLIN" 
3470 LET X2$="JO QPDIJ TFDPOEJ DSFTDF VO HSPTTP GVTUP SBNQJDBOUF" 
3480 LET X3$="SI AVVICINA UNA PATTUGLIA DI GRARG" 
3490 LET X4$="LE PAROLE MAGICHE SI TROVANO AGLI INCROCI, NELLE FONTANE E NE" 
3500 LET X5$="UN MUCCHD DI CALCINACCI TI SBARRA LA STRADA" 
3510 LET X7$="LA MONTAGNA BRONTOLA!" 
3520 LET X8$="LE TORRI CADONO!" 
3530 LET X9$="IL MAGO TI ABBAGLIA COL SUO SGUARDO" 
*3540 LET XB$="TI GUIDA" 
3550 GOSUB 4400:PRINT "COSA VUOI FARE:" 
3560 PRINT:PRINT " 1. INIZIARE UNA NUOVA PARTITA" 
3570 PRINT "O 2. CONTINUARE UNA PARTITA REGISTRATA" 
3580 PRINT:PRINT:PRINT "INTRODUCI 1 OPPURE 2" 
3590 INPUT C:IF C<>1 AND C<>2 THEN ‘GOTO 3580 
3600 IF C=1 THEN GOSUB 4450 
*3610 IF C=2 THEN GOSUB 4600 
3620 RETURN 







Potresti chiedere a qualcuno di 
dettarti le linee dalla 3420 alla 
3440, in quanto sono molto 
difficili da copiare senza errori. 











Fai attenzione a non dimenti- 
care niente quando copi 

queste linee DATA. Ti potrà 
aiutare se qualcuno te le detta. 





*3630 DATA IN UNA TOMBA SEMISCAVATA,NEL CIMITERO DEI GOBLIN 
*3640 DATA IN UNA TOMBA VUOTA,VICINO AD ALCUNE STALATTITI E STALAGMITI 
3650 DATA IN UN LABIRINTO DI TUNNEL,IN UNA CAVERNA A VOLTA 
3660 DATA VICINO AD ALTI CANCELLI DI CRISTALLO,NEL SALONE D'INGRESSO AL PALAZZO 
3670 DATA DAVANTI A UN POSTO DI SENTINELLA GRARG,NELLA STANZA DELLE GUARDIE 
3680 DATA DAVANTI A UN INGRESSO NELLE PALUDI,VICINO A CANCELLI ARRUGGINITI 
3690 DATA NEL COTTAGE DEL GUARDIACACCIA,DAVANTI A UNA PISCINA AVVOLTA NELLA NEBBIA 
3700 DATA IN UN GIARDINO CIRCONDATO DA ALTE MURA,IN UNA CAVERNA CON ISCRIZIONI 
3710 DATA DAVANTI AD UNA FONTANA ORNATA,IN UN CORRIDOIO SCURO 
3720 DATA NELLA GALLERIA LUNGA,NELLE CUCINE DEL PALAZZO 
3730 DATA IN UNA ANTICA FORNACE,SOPRA AD UN SENTIERO COPERTO DALLE ERBACCE 
3740 DATA DAVANTI A UN MULINO AD ACQUA IN DISUSO,DAVANTI A DELLE CHIUSE D'ACQUA 
3750 DATA IN UN PERTUGIO TRA GROSSI ‘MASSI,SU DI UN SENTIERO PERICOLOSO 
3760 DATA DAVANTI A UNA CAMPANA D'ARGENTO NELLA ROCCIA,NEI SOTTERRANEI DEL PALAZZO 
3770 DATA IN UNA SALA PER BANCHETTI,SOPRA I CAMMINAMENTI MERLATI DEL PALAZZO 
3780 DATA SU UNA SPIAGGIA DELL'ISOLA,DAVANTI AD UN DUE-ALBERI ARENATO 
3790 DATA IN UNA LANDA STERILE,DAVANTI A ALCUNI SACCHI AL PIANO SUPERIORE 
3800 DATA SOPRA UN PICCOLO LAGHETTO GELATO,VICINO A UNA BAITA DI MONTAGNA 
3810 DATA VICINO A UNA FILA DI BARILI,IN UNA CANTINA 
3820 DATA NEL SALONE DEGLI ARAZZI,IN UNA LIBRERIA POLVEROSA 
3830 DATA IN ACQUE AGITATE,IN UN CAMPO ARATO 
3840 DATA ALL'ESTERNO DI UN MULINO A VENTO,AL PIANO INFERIORE DEL MULINO 
3850 DATA SU DI UN SENTIERO GHIACCIATO,SU UN DECLIVIO COPERTO DI CIOTTOLI 
3860 DATA NELLA CAMERA D'ARGENTO,NELLA TANA DEL MAGO 
3870 DATA IN UN SALONE COL PAVIMENTO A MOSAICO,NELLA STANZA DEL TRONO D'ARGENTO 
3880 DATA AL CENTRO DEL LAGO,SUL BORDO DI UN LAGO GHIACCIATO 
3890 DATA SU UN SENTIERO BUTTERATO,SU DI UN ALTO PINNACOLO 25 
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3900 DATA SOPRA A UN GHIACCIAIO,VICINO AD UNA GRANDE QUERCIA ABBATTUTA 
3910 DATA IN UNA TORRETTA CON UNA SLOT-MACHINE 


3915 DATA IN UNA STANZA COPERTA DI RAGNATELE 

3920 DATA DAVANTI A UNA CASSAFORTE NELLA CAMERA DI OGBAN 
3925 DATA DAVANTI A UN ARMADIO POSTO IN UN ANGOLO 

3930 DATA IN UNO STRETTO PASSAGGIO,IN UNA PICCOLA CAVA 





3940 DATA IN UNA CAPANNA DI BOSCAIOLI,SUL FIANCO DI UNA VALLE PIENA DI BOSCHI 
3950 DATA PRESSO UN TORRENTE IN FONDO ALLA VALLE,IN UN PROFONDO BOSCO BUIO 
3960 DATA IN UN CAVO OMBROSO,DI FRONTE AD UN ANTICO CERCHIO DI PIETRE 

3970 DATA IN UNA PICCOLA STALLA,IN UNA STANZA DA LETTO NELL'ATTICO 

3980 DATA SUL FONDO DI UN POZZO UMIDO,VICONO ALL'IMBOCCO DI UN PROFONDO POZZO 
3990 DATA DAVANTI A UN FALO' SPENTO,IN UN PICCOLO FRUTTETO 

4000 DATA ALL'ESTREMITA' DI UN PONTE,ALL'ESTREMITA' DI UN PONTE 

4010 DATA AD UN INCROCIO,SU UNA STRADA TORTUOSA 

4020 DATA IN UN VILLAGGIO DI CASE RUSTICHE,IN UN COTTAGE BIANCO 

4030 DATA ALCUNE MONETE,UN LENZUOLO ,DEGLI STIVALI,UN FERRO DI CAVALLO 


4035 
4040 
4045 
4050 
4055 
4060 
4070 
4080 
4085 
4090 
4100 
4110 
4120 
4130 
4135 
*14140 
4150 
4160 
4170 
4180 
4190 
4200 
4210 
* 4220 
* 4230 
* 4240 
4250 
4260 
* 4270 
* 14280 
4290 
4300 
4310 
4320 
4330 
4340 
4350 
* 1360 
4370 
4380 
4390 


DATA ALCUNE MELE,UN SECCHIO,UN'ASCIA,UNA BARCA,UNA FIALA 

DATA ALCUNE CANNE,UN OSSO,UNO SCUDO,ALCUNE ASSI,UNA CORDA 

DATA UN ANELLO,UN ORCIO,UNA RETE,UNA SPADA 

DATA UN PIATTO D'ARGENTO ,UN'UNIFORME,UNA CHIAVE,ALCUNI SEMI,UNA LAMPADA 
DATA UN PO' DI PANE,UNO SPILLONE,ALCUNI FIAMMIFERI 

DATA LA PIETRA DEL DESTINO,UNA MELA,LETTO,ARMADIO,PONTE,ALBERI,VELA,FORNACE 
DATA DUE-ALBERI,MATTONI,MULINO A VENTO,SACCHI,VERRO DI OGBAN, POZZO 

DATA PONY,PIETRE TOMBALI,STAGNO,CANCELLI MANIGLIA,CAPANNA,VINO 

DATA ISCRIZIONI,TROLL, BRONTOLIO 

DATA CANE,FONTANA,CERCHIO,MOSAICI,LIBRI,BARILI,POZZO,MURA,RATTI,CASSAFORTE 
DATA RAGNATELE,MONETA,CAMPANA,PIATTO D'ARGENTO,PIETRE,CUCINE,COPPA,VINO 
DATA GRARG,PORTA,SVEGLIARE,GUIDARE,PROTEGGERE, GUIDARE, AIUTO, COFANO, ACQUA 
DATA STALLE. CHIUSE, PENTOLA,STATUA,PINNACOLO,MUSICA,PAROLE MAGICHE 

DATA PISCINA AVVOLTA NELLA NEBBIA,FONDO DEL POZZO,ANTICA FORNACE 

DATA CAPANNA DI MONTAGNA 

REM 

DATA E,ESO,0E,EO,EO,ESO,ESO,ES,E0,S0 

DATA S,N,ES,SO,S,NO,N,N,ES,NSO 

DATA NS,E,NSO,N,NES,EO,0,S,NS,N 

DATA NES,0,NS,B,NES,SO,E,NO,NS,S 

DATA NS,E,NSEO,0A,AB,NS,E,SO,NSE,NO 

DATA NE,EO,NSO,E,ON,S,E,NEO,NO,S 

DATA ES,SO,NES,EO,SO,NE,EO0,ES0,S0,NB 

DATA " ",E,NEO,EO,NEO,EO,EO,NEO,NEO,O0A 

DATA 80,70,60,69,74,72,63,52,20,11,1,14,36,54,61,21,32,10,50 

DATA 29,59,34,13,80,30,81,47,74 

DATA 1,2,3,4,5,9,12,13,16,17,20,21,22 

LET Z$="":FOR I=1 TO LEN (R$) 

LET C$=MID$ (R$,I,1):IF C$<"A" THEN LET Z$=Z$+C$:GOTO 4300 

LET C=ASC (C$)-1:IF C=64 THEN LET C=90 

LET Z$=Z$+CHR$ (C) 

NEXT I:LET R$=Z$:RETURN 

LET J$="SSSSSSSS":LET NG=0 

LET MP=D/2:GOSUB 4400 

PRINT "SEI PERSO NEL ":PRINT " TUNNEL" 

PRINT "CHE DIREZIONE? (N,S,0,E)" 

IF NG>15 THEN PRINT "OPPURE R PER RINUNCIARE!" 

PRINT:INPUT W$:LET J$=RIGHT$ (J$+RIGHT$ (W$,1),8) 

IF W$="R" THEN LET F(56)=1:RETURN 

IF J$<>G$ (MP) THEN LET NG=NG+1:GOTO 4320 

RETURN 












Nella linea 4430 vanno scritti 
segni=in numero diverso a 
seconda del computer. Vedi 
alle pagg. dalla 28 alla 30. 


* 4400 CLS:PRINT 
4410 PRINT TAB(EL/2-8);"IL MISTERO DELLA" 
4420 PRINT TAB(EL/2-9); "MONTAGNA D'ARGENTO" 


* 4430 PRINT "===ss=assussassosononszzossoneno 
* 4440 PRINT:PRINT:RETURN 
4450°FOR I=1 TO 80:READ E$(I):NEXT I 
4460 FOR I=1 TO G:READ C(I):NEXT I ° VI 
4470 FOR I=1 TO 13:READ A:LET F(A)=1:NEXT I PA 
4480 LET F(41)=INT (RND (1)*900)+100:LET F(42)=INT (RND (1)*3)+2 
4490 LET F(44)=4:LET F(57)=68:LET F(58)=54:LET F(59)=15:LET F(52)=INT (RND (1)*3) 
4500 LET R=77:LET R$="BUONA FORTUNA NELLA RICERCA!" 
4510 LET G$(1)="":FOR I=1 TO 8 
*1520 LET F$=MID$ (B$,1+INT (RND (1)*4)*3,1) 
*4530 LET G$(1)=G$(1)+F$ 
4540 IF F$="N" THEN LET Lé="s" 
4550 IF Fé="S" THEN LET L$="N" 
4560 IF F$="E" THEN LET Lé="0" 
4570 IF F$="O" THEN LET Lé="E" 
*4580 LET G$(2)=L$+G$(2) 
4590 NEXT I:RETURN 
*14600 GOSUB 4640:GOSUB 4670 i 
4610 LET R=F(69):LET R$="OK. CONTINUA" 
4620 RETURN 


=aan=ocaol 










Le linee dalla 4640 alla 

4820 servono a registrare 

una partita interrotta. 
4630 LET F(69)=R:GOSUB 4640:GOSUB 4760:PRINT "CIAO...":STOP 

*4640 PRINT:PRINT "NOME DEL FILE ":INPUT FL$ 
4650 RETURN 





4660 REM LETTURA DEL FILE DI DATI 
* 4670 REM 
* 4680 PRINT "OK. STO CERCANDO ";FL$ 
* 4690 X=OPENIN(FL$):PRINT "OK. CARICO" 
* 4700 FOR I=1 TO 80:INPUT#X,E$(I):NEXT I 
*4710 FOR I=1 TO G:INPUT#X,C(I):NEXT I 
*4720 FOR I=1 TO TO:INPUT#X,F(I):NEXT I 
* 4730 INPUT# 1,G$(1): INPUT#X,G$(2) 
* 4740 CLOSE#X:RETURN 

4750 REM REGISTRAZIONE DEL FILE DI DATI 
* 4760 REM 
* 4770 X=OPENOUT(FL$):PRINT "OK. STO REGISTRANDO" 
* 4780 FOR I=1 TO 80:PRINT#X,E$(I):NEXT I 
* 4790 FOR I=1.TO G:PRINT#X,C(I):NEXT I 
* 4800 FOR I=1 TO TO:PRINT#X,F(I):NEXT I 
* 4810 PRINT# 1,G$(1):PRINT#X,G$(2) 
* 4820 CLOSE#X:RETURN 
4830 LET LS=1:LET LP=1 
4840 FOR I=1 TO LEN (J$) 


* 4850 IF MID$ (J$,1,1)=" " AND LLÒEL THEN PRINT MID$ (J$,LP,LS-LP):LET LL=I-LS:LET LP=LS+1 
* 4860 IF MID$ (J$,I,1)=" " THEN LET LS=I 


4870 'LET LL=LL+1:NEXT I 
* 4880 PRINT MID$ (J$,LP,LEN (J$)-LP); 
4890 RETURN 
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Modifiche del programma per i diversi 
computer 


Sulle prossime tre pagine sono listate tutte le modifiche che vanno apportate 
al programma principale per adattarlo ai seguenti computer: Commodore 64, 
VIC 20 (+ 16K RAM), Apple II, TRS-80 Colour Computer (32K), BB(32K), 
Electron e Spectrum 48K. Cerca la sezione che si riferisce al tuo computer e 
segui le istruzioni. 


Commodore 64 


Tralascia tutte le parole LET. Modifica, 
aggiungi o tralascia le seguenti linee: 


510 Tralascia tutti gli spazi tra le parole e 
i numeri, TRANNE quelli all’interno di 
virgolette. 

580, 600, 620 Tralascia gli spazi tra le 
parole e i numeri. 

900 Tralascia tutti gli spazi. Alla fine 
della linea usa la forma abbreviata di 
RETURN: digita RET, premendo il tasto 
SHIFT quando batti la lettera T. 

910, 1010, 1040, 1070, 1200, 1240 
Tralascia tutti gli spazi. 

1600 Tralascia tutti gli spazi, tranne 
quelli tra virgolette. Usa la forma 
abbreviata di GOSUB: digita GOS, 
premendo il tasto SHIFT quando batti la 
lettera S. 


VIC 20 


Tralascia tutte le parole LET. 


10 LET EL=21:LET NO =88:LET NV = 57:LET 

G=28 

250 Tra le virgolette vanno messi 22 segni =. 

690 GOSUB 4400:J$ = R$ + “ ":GOSUB 4830:PRINT 

700 PRINT ‘‘HAI FALLITO" :PRINT 
“NELL'IMPRESA” 

710 PRINT:PRINT ‘MA TI VIENE ACCORDATA”': 
PRINT “UN'ALTRA POSSIBILITÀ” 


TRS-80 Colour Computer (32K) 


Puoi tralasciare le parole LET se vuoi. 


CLEAR 700 
10 LET EL=31:LET NO =88:LET NV = 57:LET 
G=28 
250 Tra le virgolette vanno scritti 32 segni 
2690 PRINT ‘COSA VUOI FARE ORA” 
4430 Tra le virgolette vanno messi 32 segni =. 
4440 RETURN 
4480, 4490, 4520 Sostituisci RND(1) con RND(0). 
4670 INPUT ‘‘PREMI IL TASTO ‘PLAY’ DEL 
REGISTRATORE E POI PREMI ENTER”';J$ 
4690 OPEN ‘“I"',#—1,FL$:PRINT ‘OK. 
CARICO" 


j020 talanra tutti gli spazi. 
4400 PRINT CHRS$ (147): PRINT 


4690 OPEN 1,1,0,FL$: PRINT ‘‘OK. CARICO” 

4700 FORI=1 TO 80:INPUT #1,E$(I):NEXT | 

4710 FORI=1 TO GIINPUT#1,C(1): NEXT | 

4720 FORI=1 TO 70:INPUT #1,F(I): NEXT | 

4730 INPUT 1, G$(1):INPUT #1,G$(2) 

4740 CLOSE 1: RETURN 

4770 OPEN 1,1,1,FL$: PRINT “OK. STO 
REGISTRANDO" 

4780 FORI=1 TO 80: PRINT #,E$(I): NEXT | 

4790 FORI=1 TO G: PRINT #1,C(1): NEXT | 

4800 FOR I=1 TO 70: PRINT#1,F(I): NEXT | 

4810 PRINT 1,G$(1): PRINT #1,G$(2) 

4820 CLOSE 1: RETURN 


760 PRINT ‘‘LA TUA IMPRESA HA AVU-" 

770 PRINT “TO SUCCESSO E HAI POR." 

780 PRINT ‘‘TATO LA PACE NEL PAESE" 

900, 1600 Tralascia tutti gli spazi tra le parole e 
i numeri tranne quelli tra virgolette. 

4430 Tra le virgolette vanno scritti 22 segni =. 
4400-4820 Le conversioni di queste linee sono 
uguali a quelle per il Commodore 64 (vedi sopra). 


FOR 1=1 TO 80:INPUT#—1,E$(I):NEXT | 
FOR I=1 TO G:INPUT#—1,C(I):NEXT | 
FOR 1=1 TO 70:INPUT#—1,F(I):NEXT | 
INPUT —1,G$(1):INPUT # —1,G$(2) 
CLOSE —1:RETURN 

INPUT ‘PREMI | TASTI ‘RECORD’ E 
‘PLAY’ E POI IL TASTO ENTER"’;J$ 
OPEN “O", —1,.FL$:PRINT ‘OK. STO 
REGISTRANDO" 

FOR I=1 TO 80:PRINT#—1, E$(1):NEXT | 
FOR 1=1 TO G:PRINT#—1,C(I):NEXT I 
FOR 1=1 TO 70:PRINT#—1,F(I):NEXT | 
PRINT —1,G$(1):PRINT # —1,G$(2) 
CLOSE —1:RETURN 





Apple II 


Se stai usando un registratore a cassette 
col tuo Apple, non puoi registrare su 
nastro una partita iniziata e interrotta. 
(Puoi registrare su nastro tutto il listato 
del gioco, ma devi cominciare una 
partita nuova ogni volta che lo carichi). 
Modifica o tralascia le seguenti linee: 


3610 IF C=2 THEN GOSUB 4450 
4400 HOME:PRINT 
4600-4820 Tralascia queste linee 


Se hai un disk-drive, puoi registrare una 
partita lasciata a metà. Devi fare le 
seguenti modifiche: 


4400 HOME:PRINT 


Electron 


Tralascia tutte le parole LET. 


Spectrum 





D$= ‘(Premi i tasti ‘“control’’ e D)'":PRINT 
D$; OPEN" + FL$:PRINT D$;'READ" + FL$ 
FOR I=1 TO 80:INPUT ES(I):NEXT | 

FOR 1=1 TO G:INPUT C(I):NEXT | 

FOR 1=1 TO 70:INPUT F(1):NEXT | 

INPUT G$(1):INPUT G$(2) 

PRINT D$;'‘CLOSE"' + FL$:RETURN 

D$ = ‘‘(Premi i tasti ‘“control'’ e D)':PRINT 
D$;'“ OPEN" + FLS$:PRINT D$;‘‘WRITE" 
+FL$ 

FOR I=1 TO 80:PRINT E$(I):NEXT | 

FOR |=1 TO G:PRINT C():NEXT | 

FOR I=1 TO 70:PRINT F(1):NEXT | 

PRINT G$(1):PRINT G$(2) 

PRINT D$;‘‘CLOSE" + FL$:RETURN 


BBC 


Puoi saltare le parole LET, se vuoi. 


Lascia premuto il tasto CAPS LOCK mentre batti il programma e mentre giochi. 
Dovunque trovi sigle del tipo X1$, X2$, ... ecc., fino a X9$, o XB$ nel programma, 
sostituiscile con le parole tra virgolette nelle linee dalla 3450 alla 3540 del listato 
principale. Per esempio, la linea 530 diventerà: 


530 IF R=48 AND F(63)= 0 THEN LET R$ = “IL MAGO TI ABBAGLIA COL SUO SGUARDO”: GOTO 30 


Modifica, aggiungi o tralascia le seguenti linee: 


10 LET EL=32:LET NO =88:LET NV = 57:LET G=28 
60 LET P$=XS$(VAL(D$(1))) 
61 IF P$(1) =‘ ''THEN LET P$=‘“ ";GOTO 69 
63 IF P$(LEN(P$))= ‘THEN LET P$=P$(TO LEN(P$)—1):GOTO 63 
65 LET P$=P$+'’'+Y$(VAL(D$(2))) 
68 IF P$(LEN(P$)) =‘ ''THEN LET P$=P$( TO LEN(P$)—1):GOTO 68 
69 LET P$=P$+"" 
70 LET J$=R$+ ‘+ “TI TROVI" +P$+DS$(3 TO )+ ‘ "’:GOSUB 4830 
110 Tralascia questa linea. 
120 IF F(I)=0 AND C(1)= R THEN GOSUB 4900 
180 IF R=18 AND E$(18)= ‘N’ THEN LET J$=J$ + “UNA PORTA DI QUERCIA,” 


250 Qui vanno scritti 32 segni =. 
300 FORI=1 TO LEN(I$)1 
310 IF I$(I)=" AND V$ =’ THEN LET V$=1$( TO I—-1) 
320 IF I$(1+1)< >" AND V$<>" "THEN LET T$=1$(1+1 TO ):LET 1= LEN(1$) 
360 LET U$=V$( TO 3) 
370 FORI=1 TO NV:IF B$(1#3—2 TO 1#3)= U$ THEN LET VB=1:LET 1 = NV 
550 GOSUB X(VB) 
560-640 Tralascia queste linee 
1970 IF R=37 AND D=4 AND E$(37)= “EW” THEN LET R=67:LET R$ = “IL PASSAGGIO 
ERA RIPIDO!":RETURN 
1110 LET K$=E$(OM, 1) 
3300 LET R$ = ‘LE PAROLE MAGICHE SI TROVANO AGLI INCROCI, NELLE FONTANE E NE" 
+D$(3 TO ):RETURN 
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30 


3310 LET X=INT((R—1)/2)+1 

3312 RESTORE X# 10 + 3620 

3315 FORI=O TOR—X#2+1 

3317 READ DS:NEXT | 

3330 RESTORE 4030 

3350 LET D$=D$(2 TO ): RETURN 

3360 PRINT “PREMI ENTER PER CONTINUARE” 

3380 DIM C(G):DIM E$(80,4):DIM F(70): DIM X$(6,4):DIM Y$(6,7):DIM G$(2,8):DIM X(NV + 1) 
3450-3540 Tralascia queste linee 

3545 GOSUB 5000 

3630-4220 Le prole delle linee di DATA devono essere tra virgolette, p.es.: 

3630. DATA “IN UNA TOMBA SEMISCAVATA"'.‘‘NEL CIMITERO DEI GOBLIN” 

4220 Non mettere le virgolette tra virgolette. 

4230-4250 Non devi mettere i numeri di queste linee di DATA tra virgolette. 

4270 LET C$=R$(I):IF C$< A" THEN LET Z$=Z$ + C$:GOTO 4300 

4280 LET C=CODE(C$)—1:1F C=64 THEN LET C=90 

4360 PRINT:INPUT WS$:LET J$=(J4$ + W$(1)) (2 TO ) 

4430 Qui vanno scritti 32 segni =. 
4480, 4490 Sostituisci RND(1) con RND. 
4520LET F$ = B$(1 + INT(RND #4)# 3) 
4530 LET G$(1)= G$(1)( TO I—1)+F$ 
4580 LET G$(2)=L$+G$(2) ( TO I—-1) 
4640 Sostituisci FL$ con F$ 

4689 PRINT “OK. STO CERCANDO ";F$ 
4690 Tralascia questa linea. 

4700 LOAD F$ + ‘‘(E$)"" DATA E$() 
4710 LOAD F$+ ‘‘(C)"" DATA C() 
4720 LOAD F$+ ‘'(F)" DATA F() 
4730 LOAD F$ + ‘‘(G$)"" DATA G$() 
4740 RETURN 

4770 Tralascia questa linea. 

4780 SAVE F$+ ‘‘(E$)"’ DATA E$() 
4790 SAVE F$+ ‘‘(C)"” DATA C() 

4800 SAVE F$ + ‘‘(F)”’ DATA F() 

4810 SAVE F$ + ‘‘(G$)'” DATA G$() 
4820 RETURN 

4850 IF J$(I)=‘ "AND LL>EL THEN PRINT J$(LP TO LS—1):LET LL=I—LS:LET LP = LS+1 
4860 IF J$(1)= ‘‘ '’THEN LET LS=| 

4880 PRINT J$(LP TO); 

4900 LET P$=Y$(VAL(O$(1))).:GOSUB 3350 

4910 IF P$(LEN(P$))= ‘THEN LET P$=P$( TO LEN(P$)_1):GOTO 4910 

4920 LET J$=J4$+""+P$+""+0$+"‘” 

4930 RETURN 

5000 RESTORE 6000:FOR |=1 TO NV+1 

5010 READ X(I):NEXT | 

5020 RESTORE 4150:RETURN 

6000 DATA 800,800,800,800,300,800,1220,1290,1290,1470,1470,1750,1890 

6010 DATA 1960,1980,2010,2050,2870,2120,2220,2310,2380,2420,2450,2470,2520 

6020 DATA 2550,2580,2610,2650,2670,2700,2720,2730,2830,2800,2870,2730,2920 

6030 DATA 2950,2990,3010,3050,3070,2310,2990,3070,3130,2120,3190,1470,3100 

6040 DATA 2870,3150,1290,1290,3170,3200 







Come si registra una partita 
interrotta sullo Spectrum 


Quando registri una partita lasciata a 
metà (vedi pag. 31), devi dare un nome 
di file alla partita. Poi apparirà sullo 
schermo il messaggio START TAPE, 
THEN PRESS ANY KEY (fai partire il 
registratore e poi premi un tasto). Il 
computer registra i dati in quattro 
blocchi. Dopo ogni blocco, visualizza 
di nuovo lo stesso messaggio, e dovrai 
premere ENTER per registrare il 
successivo blocco di dati. 














Come si gioca 


IL MISTERO DELLA 
MONTAGNA D'ARGENTO 


COSA VUOI FARE: 
1. INIZIARE UNA NUOVA PARTITA 
O 2. CONTINUARE UNA PARTITA 
REGISTRATA 


INTRODUCI 1 OPPURE 2 
È 


Quando introduci RUN, appare sullo 
schermo questo messaggio. Digita l e 
premi RETURN per iniziare il gioco. (Il 
tasto 2 serve per caricare una partita già 
iniziata e interrotta. In fondo alla pagina 
potrai saperne di più su come si fa). 


IL MISTERO DELLA 
MONTAGNA D’ARGENTO 


TI TROVI SUL FIANCO DI UNA VALLE 
PIENA DI BOSCHI. PUOI VEDERE 
UN'ASCIA E PUOI ANDARE A N, S 


COSA VUOI FARE ORA 
PRENDERE ASCIA 


Ogni volta che ti muovi, il computer ti 
descriverà dove ti trovi. Se vuoi portare 
con te qualcosa, scrivi PRENDERE e il 
nome dell’oggetto. Per sapere che 
cos’hai con te, scrivi INVENTARIO. 


IL MISTERO DELLA 
MONTAGNA D'ARGENTO 


NON PUOI COLPIRE FIAMMIFERO. TI 
TROVI VICINO A UN FALO SPENTO E PUO! 


ANDARE A S, O, E 


COSA VUOI FARE ORA 
PACCENDERE FALO 


Il computer è programmato in modo tale 
che può comprendere soltanto 
determinte istruzioni. Se non capisce il 
tuo comando, visualizza un messaggio 
come questo qui sopra, o PREGO? o 
PROVA QUALCOS'ALTRO. 











IL MISTERO DELLA 
MONTAGNA D'ARGENTO 


BUONA FORTUNA NELLA RICERCA! TI 
TROVI AD UN INCROCIO, E PUOI ANDARE 


A E, O, 
COSA VUOI FARE ORA 
? 





Quando inizia la partita, il comptuer 
stampa questo messaggio, che ti informa 
su dove ti trovi e che puoi andare a est o 
a ovest. Ti puoi spostare nel gioco 
scrivendo N, S, E, O, A o B per andare 
verso nord, sud, est, ovest, alto e basso. 


IL MISTERO DELLA 
MONTAGNA D’ARGENTO 


OK. TI TROVI VICINO AD UNA PALUDE E 
PUOI ANDARE A N, E 


COSA VUOI FARE ORA 
NUOTARE PALUDE 





Puoi dare al computer istruzioni 
consistenti di due parole, come per 
esempio APRIRE PORTA oppure 
RIEMPIRE ORCIO*. Le istruzioni come 
LEGGERE MESSAGGIO oppure 
ESAMINARE FIGURE possono talvolta 
rivelare ulteriori informazioni. 


IL MISTERO DELLA 
MONTAGNA D’ARGENTO 


OK. TI TROVI DAVANTI A ALTE MURA E 
PUOI ANDARE A N, O 


COSA VUOI FARE ORA 
?REGISTRARE 


NOME DEL FILE 
?GIOCO 





Scrivendo REGISTRARE GIOCO in qualsiasi 
momento della partita, potrai immagazzinarla 

su nastro o disco. Potrai continuare la partita 
interrotta quando vuoi, scrivendo 2 in 

risposta alla domanda che appare sullo 

schermo quando carichi il programma del 

gioco e lo fai girare (vedi in alto). 31 


* Se un oggetto ha un nome composto da due parole, come per esempio ‘piatto d’argento”, puoi usare 
un’istruzione formata da tre parole, come USARE PIATTO D'ARGENTO. 


32 


Suggerimenti 


A meno che tu non ce la faccia proprio da solo, non leggere questa pagina: 
essa contiene i suggerimenti per risolvere alcuni degli enigmi della 


MONTAGNA D'ARGENTO. 


Se il programma non funziona o se compaiono messaggi di errore, controlla 
attentamente ogni linea. Chiedi a qualcuno di leggerti il listato, compresa la 


punteggiatura. 


Qui c’è un elenco delle istruzioni che il 
computer capisce. Se introduci 
un’istruzione diversa il computer non la 
capirà, anche se per te ha senso. 
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Speedy Computer 


Il calcolatore è anche (o 
soprattutto?) una macchina 
divertente. Si può giocare con 
lui, gli si possono fare delle 
domande, lo si può usare per 
scrivere una poesia o per 
suonare. 

Questa colorata serie di libri vi 
propone alcune delle cose più 
eccitanti che si possono fare 
con un calcolatore e vi spiega 
come farle. 

Scritti in linguaggio chiaro e 
comprensibile a chiunque, 
arricchiti da una moltitudine di 
illustrazioni, questi libri 
rappresentano una spiritosa 
introduzione al mondo dei 
computer per chi comincia da 
zero. 


L'affascinante mistero della 
montagna d'argento vi sarà 
svelato in un'avventura 
mozzafiato. 
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altri volumi 
di questa collana 


ESPANSIONI DEL PERSONAL 
COMPUTER 

Espansioni, accessori, 
interfacciamento... tutti i “cosa?” e 
i “come?” per far diventare il 
vostro piccolo computer una vera 
“centrale operativa”. 


GIOCHI DI SPIONAGGIO, 
BRIVIDO E MISTERO 

Spionaggio, mistero, terrore sul 
vostro video: più di venti giochi che 
vi faranno star svegli la notte. 


IL COMPUTER CON FANTASIA 
Progettate anche voi un “fantasy” 
dopo aver appreso giocando tutti 
i segreti del “sotterraneo del fato”. 





COD. 019 D 


ISBN 88-7056-251-4 


